From fb427b91d8fad4321d5e0200cdd4f34249b65e59 Mon Sep 17 00:00:00 2001 From: Kenichi Handa Date: Mon, 18 Aug 2003 12:37:41 +0000 Subject: [PATCH] (encode-char): Fix for the ASCII case. --- lisp/international/mule.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/lisp/international/mule.el b/lisp/international/mule.el index f37c3704cf2..f15e604c037 100644 --- a/lisp/international/mule.el +++ b/lisp/international/mule.el @@ -370,7 +370,7 @@ code-point in CCS. Currently not supported and just ignored." (setq split (split-char trans) charset (car split))) (cond ((eq charset 'ascii) - char) + (or trans char)) ((eq charset 'latin-iso8859-1) (+ (nth 1 split) 128)) ((eq charset 'mule-unicode-0100-24ff) -- 2.30.2